<SCRIPT>
<!--
function --nombre_lista--populate2(inForm,theValue, theList, theList2) {
   var existe = false;
   for (i=0;i<inForm.campo.length;i++) {
     if (inForm.campo.options[i].value == theValue) existe = true;
   }
   if (existe == true) {
   } else {
     var i = inForm.campo.length;
     var option = new Option(theValue, i);
     eval("inForm.campo.options[i]=option")
     inForm.campo.options[i].selected=true
	 inForm.campo.options[i].value=theValue
	 inForm.campo.options[i].text=theList.options[theList.selectedIndex].text
	 
	 theList2.options[i].selected=true
	 
   }
}

function --nombre_lista--deleteAnItem(theList,itemNo) {
   if (itemNo >=0)
     theList.options[itemNo]=null;
   while(itemNo >0){
     itemNo--;
     theList.options[itemNo].selected=true
   }
}
//-->	
</script>
  <table width="50%" border="0">
    <tr> 
      <td rowspan="2" width="30%"> 
--Objeto_lista--
      </td>
      <td width="38%" height="52"> 
        <div align="center"> 
          <input type="button" value="&gt;&gt;&gt;" onClick="--nombre_lista--populate2(data,--nombre_lista--.value, --nombre_lista--, campo)">
        </div>
      </td>
      <td rowspan="2" width="32%"> 

--Objeto_campo--		

      </td>
    </tr>
    <tr> 
      <td width="38%"> 
        <div align="center"> 
          <input type="button" value="&lt;&lt;&lt;" onClick="--nombre_lista--deleteAnItem(campo,campo.selectedIndex)">
        </div>
      </td>
    </tr>
  </table>